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2i& 






,LIST 




217 






|LPS«li 


AO DEC/X 


218 










2!9 


000000* 






lOMOD 


220 


000000* 






MODULE 


22! 








.TITLE 1 


222 






1 


DOXCOM 1 


223 








.LIST 1 


224 






S4I#»«»»#««»#««#4*< 


225 


000000* 




BEGINI 




226 


000000* 


050114 043104 040 MODNAMi 


.ASCII , 


227 


000005* 


000 


XFLAGI 


,BYTE ( 


228 


000006* 


170400 


ADDPl 


170400*0 


229 


000010* 


000001 


VECTORI 


1+0 


230 


000012' 


300 


BRll 


.BYTE I 


231 


000013* 


000 


BF<2t 


bBYTE i 


232 


000014^ 


000001 


DVIDll 


*1 


233 


000016* 


000000 


SPlI 


OPEN 


234 


000020'^ 


000000 


SP2I 


OPEN 


235 


000022* 


000000 


SP3I 


OPEN 


236 


000024* 


000000 


SP4I 


OPEN 


237 






f »»#«»»»«»»»«###« 


238 


000026* 


140000 


STATI 


140000 


239 


000030* 


000250' 


INITl 


START 


243 


0wia032* 


000224' 


SPOTNTi 


MODSP 


241 


000034* 


000000 


PASCNTI 





242 


000036* 


000062 


ICONTI 


50« 


243 


000040* 


000000 


ICOUNTI 





244 


000042* 


000000 


SOFCNTi 





245 


000044* 


000000 


HPDCNTi 





246 


000046* 


000000 


SOFPASI 





247 


00(^050' 


000000 


HPDPASI 





248 


000052* 


000000 


SYSCNTi 





249 


000054* 


000000 


PANNUMi 





230 


000056* 




CONFlGi 




251 


000056' 


000000 


PESlI 





2S2 


000060* 


000000 


PFS2I 





253 


000062* 


000000 • 


SVR0I 


OPEN 


254 


000064* 


000000 


SVBll 


OPEN 


255 


000066' 


000000 


SVP2I 


OPEN 


256 


000070* 


000000 


SVP3I 


OPEN 


257 


000072' 


000000 


SVR4I 


OPEN 


258 


000074* 


000000 


5VP5I 


OPEN 


259 


000076' 


000000 


SVP6I 


OPEN 


260 


000100' 


000000 


CSRAl 


OPEN 


26S 


000102' 




SBADPI 




262 


000102' 


000000 


ACSPI 


OPEN 


263 


000104* 




WASADRl 




264 


000104* 


000000 


ASTATI 


OPEN 


265 


000106' 




ERPTYPI 




266 


000106* 


000000 


ASBl 


OPEN 


267 


000110* 


000000 


AWASi 


OPEN 


268 


000112' 


000264' 


BSTRTI 


PESTRT 


269 


000114' 


000000 


WDTOl 


OPEN 


270 


000116' 


000000 


WDFR! 


OPEN 
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140000, LPDF »l70400,l,6»rf50,,50 
LPDF OEC/XU SYSTEM EXERCISER MODULE 
VERSION 6 23«MAY«78 
BIN 

/LPDF / iMODULE NAME, 

OPEN I USED TO KEEP TRACK OF WBUFF USAGE 

flST DEVICE ADDR, 

1 1ST DEVICE VECTORi 
PRTY6-f0 1 1ST BR LEVEL, 
PRTY*0 |2ND BR LEVEL, 

IDEVICE INDICATOR 1, 

ISWITCH REGISTER 1 

fSijilTCH REGISTER 2 

fSWITCH REGISTER 3 

fSWITCH REGISTER 4 

fSTATUs WORD, 

fMODULE START ADDR, 

I MODULE STACK POINTER, 

fPASS COUNTER, 

»# OF ITERATIONS PER PASSs50, 

»LOC TO COUNT ITERATIONS 

|LOC TO SAVE TOTAL SOFT ERRORS 

fLOC TO SAVE TOTAL HARD ERRORS 

ILOC TO SAVE SOFT ERRORS PER PASS 

iLOC TO SAVE HARD ERRORS PEP PASS 

|S OF SYS ERRORS ACCUMULATED 

iHOLDS RANDOM # ^^^n rand MACRO IS CALLED 

IRESERVED FOR MONITOR USE 

PRESERVED FOR MONITOR USE 

iRESERVfD FOR MONITOR USE 

iLOC TO SAVE R0, 

iLOC TO SAVE Rl, 

fLOC TO SAVE R2, 

iLOC TO SAVE R3, 

fLOC TO SAVE R4, 

iLOC TO SAVE R5, 

fLOC TO SAVE R6, 

fADDR OF CURRENT C5R, 

fADDR OF GOOD DATA, OR 

fCONTENTS OF CSR, 

fADDR OF BAD DATA, OR 

fSTATUS REG CONTENTS, 

ITYPE OF ERROR 

fEXPECTED DATA, 

f ACTUAL DATA, 

fRESTARt ADDRESS AFTER END OF PASS 

fWOPDS TO MEMORY PER ITERATION 

fWORDS FROM MEMORY PER ITERATION 
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271 
272 
273 
274 

275 
276 
277 

278 
279 
280 
281 
282 
283 
284 
285 
286 
287 
289 
289 
290 
291 
292 
293 
294 
295 
296 
297 
298 
299 
300 
301 
1^*2 
3>^3 
304 
305 
306 
307 
308 
309 
31<3 
311 
312 
313 



000120* 000000 
000122* 000050 

000040 



f# OF INTERRUPTS PER ITERATION 
fMonULE IDENTIFICATION NUMBERS50 
fMOOULE STACK STARTS HERE, 



INTRI OPEN 
IDNUMI 50 

.REPT SPSIZ 

,NLIST 

,W0RD 

.LIST 

.ENDP 

.LIST 

.LIST 

.LIST 

.LIST 

»LIST 

.LIST 

.LIST 

,LIST 

,LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

«LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

.LIST 

sLIST 

.LIST 

.LIST 
MODSPI 

.LIST * 
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314 
315 
316 
317 
318 
319 
320 
321 
322 
323 
324 
325 
326 
327 
328 
329 
330 
331 
332 
333 
334 
335 
336 
337 
338 
339 
340 
341 
342 
343 
344 
345 
346 
347 
348 
349 
350 
351 
352 
353 
354 
355 
356 
357 
358 
359 
360 
361 
362 
363 
364 
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000224' 001000 

000226' 000004 

000230' 000003 

000232' 000001 



000234' 170400 
000236* 170402 



000240* 170436 
000242' 170401 



000244' 000300 
000246* 000302 



000250' 012767 
000256* 012767 



000264' 
000272' 
000 300' 
000306* 
000314' 
000322' 
000330" 
000334* 
000342' 
000350* 
000356' 
000364* 
000372* 



000414' 
000422' 
000426' 
000430* 
000432' 
000436' 
000442' 



016767 
016767 
062767 
016767 
062767 
016767 
005267 
016767 
016767 
062767 
016767 
016767 
012767 
012767 
10<415 
104415 
016700 



ADPAS&S 1000 

WIDEI 4 

ENDCHI 3 

WHXCNTI 1 



006100 
042700 
052700 
010067 



010000 

010000 

177516 
177510 
000002 
177474 
000036 
177460 
177706 
177450 
177442 
000002 
177652 
177634 
002522* 
002724' 
.000000' 
000000' 
002064 



117777 

010000 

002016 



77636 
77634 

77742 
77736 
77730 
77724 
77716 
77712 

77702 

77676 

77670 

77514 

002076 

002106 

002106 

002506* 

002514' 



INUMBER ON TIMES THRU hl.h CHANNELS BEFORE "ENDPASS" 

f ♦ OR « COUNT SPREAD ON AN A TO D CONVERSION 
iHItJHEST CHANNEL TO BE TESTED <77 
rCOUNTER BEFORE CONVERSIONS ARE TESTED 



iLPS-ftD COMMON DEVICE ADDRESSES 



ADCSI 170400 
ADDBRI 170402 



lA TO D STATUS REGISTER 
|A TO D BUFFER 



ADMRI 170436 |NPR A TO D OPTION ADDRESS 

ADCSHBI 170401 I A TO D STATUS <HIGH B)fTE> 

iLPS-AD COMMON DEVICE INTERRUPT VECTOR 



ADINTI 300 
ADINTil 302 



I A TO D VECTOR 



|NOW SET Up THE ADDRESS AND VECTOR DiSPftTCH LOC, 
STARTI MOV «l0000rMDTO | 10000 WDS TO MEM 

MOV #10000#INTR 110000 INTERRUPTS/ITERATION 



RESTRTI MOV 
MOV 
ADD 
MOV 
ADD 
MOV 
INC 
MOV 
MOV 
ADD 
MOV 
MOV 
MOV 
MOV 

GETPAS. 
GETPAt, 
MOV 
SWAB 
POL 
BIC 
BIS 
MOV 



ADDP»ADCS 

ADDR,ADDBR 

#2»ADDBR 

ADDRfADMR 

#36rADMR 

ADDRfADCSHB 
. ADCSHB 

VECTOR»ADINT 

VECTORfADINTl 

#2#ADINTl 

ADCSfCSRA 

ADPASS#ADPAS 

9ADTBLA,TABA 

f)ADTBLB»TABB 
BEGIN, TABA 
BEGIN, -TABB 

TABAEa,R0 

R0 

R0 

#117777»R0 

#BIT12#R0 

R0,MYEA 



ILOAD DEVICE ADDRESS 



»LOAD DMA WORD 

>T0 CORPECT VALUE 

I LOAD ADC HIGH BYTE LOC 

fMAKE HIGH BYTE 



I GET TABLE A ADDRESS 

I GET TABLE B ADDRESS 

|GET PHYSICAL ADDRESS FROM 16«BIT TABA 
iGET PHYSICAL ADDRESS FROM ib«BlT TABB 

I GET EXTENDED MEMORY BITS 

»MOVE TO HIGH BYTE 

|MOVE LEFT 

pMASK 

ISET DMA ENABLE 

ISAVE EA BITS AND DMA ENABLE 



) 
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365 
366 
367 
368 
369 
370 
371 
372 
373 
374 
375 
376 
377 
378 
379 
380 
381 
382 
383 
384 
385 
386 
387 
388 
389 
390 
391 
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000446' 005077 177562 

0004S2* 005777 177556 
000456* 001025 

000460* 012777 052524 

000466' «12767 052524 

000474* 022777 052524 

000502* 001013 

000504' 012777 125012 

000512" 012767 125M12 

000S20' 022777 125012 
000526' 001001 
000530' 000420 

000532' 017767 177476 

00954CI' 016767 17747k5 

000546' 005077 177462 

000552' 012767 000P25 

000560' 104405 00000'*' 

000566* 104410 000000' 



|l,PS»AD LOGIC TEST 

TE5TADI CLP PADCS 

TST §ADCS 

BNE IS 



ICLEAR STATUS 
ITEST STATUS 
|BR IF ERROR 

iLOAD STATU& 
iLOAD POINTER 
I TEST STATUS 
|BR If FRROP 

ILOAD STATUS 
iLOAD POINTER 
I TEST STATUS 
|8R IF ERROR 



fREAD STATUS 

iLOAD ADDRESS 
CLP PADCS lENSURE CLEAR STATUS 

MOV #25,ERRTYP |BIT STUCK IN C/S REG 

I «■»»«»«»»»«»»»»*»»»»«*«»»»«■»«»*«»»»»«»*»*»****«*«*************** 
HRDER8, BEGIN, NULL f CONTPOL/STATUS BIT IN ERROR 

ENDSfBEGiN f 



177546 


MOV 


#52524, PADCS 


177410 


MOV 


«52524,ASTAT 


177532 


CMP 


#52524, RAOCS 




BNE 


1$ 


177522 


MOV 


#125012, PADCS 


$77364 


MOV 


»125012,ASTAT 


177506 


CMp 


#125012, 9ADCS 




BNE 


18 




BR 


PRIMTS 


177342 ISI 


MOV 


§ADCS,ACSR 


177332 


MOV 


ADCS,CSRA 
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392 
393 
394 
395 
396 
J97 
390 
399 
400 
401 
402 
403 
404 
40S 
406 
407 
408 
409 
410 
411 
412 
413 
414 
415 
416 
417 
418 
419 
420 
421 
422 
423 
424 
425 
426 
427 
428 
429 
430 
431 
432 
433 



00f572' 005767 177220 
000576* 100402 
000600* 000167 000522 



000604' 005077 177424 
000610' 012777 000006 177416 
000616* 016767 177416 177254 



000624* 005077 177410 

000630* 005067 177250 

000634* 005777 177400 

000640* 001037 



000642' 012777 

000650' 012767 

000656' 022777 

000664' 001025 

000666' 012777 

000674' 012767 

000702' 022777 

000710* 001013 

000712' 012777 

000720' 005067 

000724* 005777 

00073^'' 001003 

000732* 005077 
000736' 000417 

000740* 017767 
000746' 005077 
000752' 005077 
000756' 012767 

000764' 104405 

000772* 104410 



125212 177370 
125212 177226 
125212 177354 



052524 177344 
052524 177202 
052524 177330 



000001 177320 

177160 

17731M 



177274 177134 

177266 

177256 

000025 177122 

000000' 000000 

000000' 
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PPIMTSI TST 
BMI 
JMp 


SHI 

TSTCAR 

PRIME 


iTEST SRI 
|BR IF NPR 


iTEST THE LPS' 


•NP CURRENT ADDRESS REGISTER 


TSTCARl CLR 
MOV 
MOV 


iADCS 

#6,PADCS 

ADMRjCSRA 


ICLEAP CONTROL 

iLOAD MODE 

iLOAD ERROR DEVICE ADDRESS 


CLR 
CLR 
TST 

BNE 


glADMR 
ASTAT 
©ADMR 
18 


ICLEAR C.A» 
ICLEAR POINTER 
iTEST C.A, 
|BR IF ERROR 


MOV 
MOV 
CMP 
BNE 


#12S212f9ADMR 
#125212»ASTAT 
#12S212#PADMR 
IS 


ILOAD C,A« 
iLOAD POINTER 
iTEST IT 
|BR IF ERROR 


MOV 
MOV 
CMP 
BNE 


«52S24#eADMR 
#52524»ASTAT 
S52324,PADMR 
1$ 


ILOAD C.A. 
iLOAD POINTER 
iTEST IT 
iBR IF ERROR 


MOV 
CLR 
TST 

BNE 


#1#|8ADMR 
ASTAT 
gAOMR 
18 


ILOAD ODD ADDRESS <N0 ODD BIT> 

ICLEAR POINTER 

iTEST IT 

iBR IF ODD ADDRESS 



CLR fADMR ICLEAR EXT STATUS 

BR TSTWCR iTEST W^C, REGISTERS 

MOV PADMRiACSR IREAD BAD VALUE 

CLR ?ADMR ICLEAR REGISTER 

CLP 9ADCS iCLEAR CONTOL 

MOV #2S,ERRTYP fBIT STUCK IN CUR ADDR REGISTER 

HRDERS*BEGin,nUll fCURRENT ADDRESS REGISTER BIT IH ERRQR 

END$#BEGIN f 



177224 
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434 

435 
436 
437 
438 
439 
440 
441 
442 
443 
444 
445 
446 
447 
448 
4 49 
450 
451 
452 
45 3 
454 
455 
456 
457 
458 
459 
460 



000776' 005077 
0(?1002* 012777 
001010' 005077 
001014' 005067 
001020' 005777 
001024' 001024 

001026' 012777 

001034* 012767 

001042' 022777 

0P«1050' 001012 

001052* 012777 
001060* 012767 
001066' <*22777 
001074' 001413 

0«1076* 017767 
001104' 012767 

00U12' 104405 

001120' !a44ia. 
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JTEST THE LPS»NP WORD COUNT REGISTER 



177232 
000004 
177224 
177064 
177214 



005252 177204 
005252 177042 
0f^5252 177170 



002525 177160 
fpi2525 177016 
002525 177144 



177136 176776 
000025 176774 

000000* 000000 



TSTWCRl CLR 


0ADCS 


lENSURE CLEAR CONTROL 


MOV 


»4,9ADCS 


iLOAD POINTER TO W^C, 


CLR 


PADMp 


ICLEAR w.C, 


CLR 


ASTAT 


ICLOAD POINTER 


TST 


9ADMP 


iTEST W,C, 


BNE 


18 


|BR IF ERROR 


MOV 


»5252#6IADMR 


ILOAD W.Cs 


MOV 


«5232fASTAT 


iLOAD POINTER 


CMP 


#5252#eADMR 


iTEST W,C, 


BNE 


1$ 


|BR IF ERROR 


MOV 


#2525#iiADMR 


ILOAD W.Cs 


MOV 


«2525#ASTAT 


iLOAD POINTER 


CMP 


»2525»^ADMR 


iTEST W,C, 


BEO 


TSTEXT 


|BR IF NO ERROR 



MOV PADMR,ACSR iREAD W.C, VALUE' 

MOV #25,ERRTYP ,8IT STUCK IN WORD COUNT REGISTER 

HRDER8. BEGIN, NULL fWORD COUNT REGISTER BIT In ERROR 

EK)D$,RE-C;iM } 
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464 










46'> 


t^^.l124» 


t^05«.)77 


177 1 '1 




466 


(tt'.1 \i^' 


.'12777 


t'(;'(S0n? 


177076 


467 


vnM!36' 


r^a5c77 


I 7 7 v^ 7 6 




468 


IHM 142' 


^^5(^167 


176736 




46'-> 


(K»t J 46' 


vn.i57 77 


177(166 




4 70 


001152* 


{M'l046 






471 










472 


0tM 154' 


VU2777 


V'^iM^V'-A 


177056 


473 


1.111162' 


012767 


t150ii0U 


176714 


47 4 


W0n70' 


^'22777 


l^Sv^l-HUI 


177042 


4 75 


001 176* 


t'-JU'34 






476 










477 


kjpil 2fri^'* 


12777 


20lH''<' 


177032 


478 


0("12t^6» 


^112767 


k12^fe5*^»> 


176670 


479 


0<^1214' 


V122777 


2i'v^^*(' 


177016 


18ti 


0.M22?' 


i-^«l022 






481 










482 


(10 I 224* 


("12777 


(^0k11 tH> 


177002 


483 


M(r'1232' 


t'52777 


^(.}0fiV'2 


176774 


4tf4 


{^01 24i^* 


^' 12777 


01 (^HU! 


I7b772 


4tj5 


t' 1 2 4 6 • 


"32777 


iclM(M ">' 


176760 


4b6 


0^1254' 


510 UH' 5 






4 87 










18B 


ir'P1256' 


«:n'!5077 


176756 




48^ 


011126 2' 


iv'5i^77 


17674b 




49U 


e'.H266' 


H0O417 






4gi 










492 


i-i e 1 2 7 ' 


317767- 


176744 


176604 


493 


v^t'1276' 


i'm5(^77 


176736 




494 


(-5(1 nv^ 2' 


15O7 7 


176726 




195 


0(1 1 306' 


tU2767 


t^:^V?'.^25 


176572 


496 










497 


vie 1 3H' 


1 M4 4t»5 


0'HU-HI'l' 


00000.'' 


498 










19'^ 


.1.^1 322' 


1 / 4 4 ! ;i 


S/'.Wl'^l^^' 





iTt'ST THfc RXTFNDEn STATUS RrGlSTCR RITS 

TSTF'XTI CLR PAOCS JPNSURE Cl/tAP CONTROL 

MOV »2i<aftDCS iLOftD MnDE 

CIR PAOVR iCLEAP FXT STATUS 

CLP ASTftT JCLEAP POINTER 

TST #ADMP iTEST IT 

BNE 18 |0H IF FBPOR 

KOV «BIT14|BlT12,0AnMR ILOAD EXT STATUS 

^«0V »PIT14|PIT12#ASTAT fLOAD POINTER 

CMP aBITl4JBIT12#9ADMR »TEST IT 

BNE IS fBR IF FRPOP 

MOV «PITl3»ftA0MR JLOAD EXT STATUS 

MOV »RIT13,ASTAT jLOAD POINTER 

CMP »PIT13»0ADMP jTEST IT 

BNE IS iBP IF FRROR 

MOV »100#aADCS ILOAD XNT ENABLE 

BTS »2,aAnCS iSET wodE 

MOV 8BITl2#(aADMR jENRBLE D^A 

RIT »l00,flADCS fOMA ENP, SHOULD CLEAR TNT ENABLE 

BNE IS »BP IF RiT SIX SET 

CLP PAOMR fCLEAP FXT STATUS 

CLR (PADCS iCLEAR CONTROL 

BR PRIME iSTART TEST 

181 MOV BADMP,ACSR fPERP VBLUE 

CLR (aADMR iCLFAP FXT STATUS 

CLP PADCS jENSURE CLEAR CONTROL 

f^OV lt25fERRTYP |BIT STUCK IN EXT, STAT REGISTER 

I »«»»«•«»««*«*»««»»*««»»»»»»»«»««»«»»«»*»»»«»«*»»»*«»«'*« »«*«*««»« 

HPDFPS,PEGIN»mULL jEXTENDFD STATUS REGISTER BfT I W ERROR 

J »»»»*«*«»»»«»«»»»»»«»»»»»«»#«*«»»»««»»»#»»««»#»«»«#«»»»»»««»»»« 

feMD$#PtGlw I 



) 
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5'^.) 
5' 11 
502 
















5i-^3 

5;- 4 

505 










t PRIMFP ROtlTlNF 


w.M 326' 


•;<05v^77 


1767^'2 




pKjMf J 


CLH 


pftOCS 


5^6 


001332' 


t'i-55767 


17646v, 






TST 


SRI 


507 


o.'l 3 36* 


100026 








HPL 


TSMPAO 


5-18 


(i;-i ?40* 


012777 


0c^l7 1 ?' 


1 76676 




MOV 


»NpPAn,0ADINT 


5v?9 


001346' 


'M2777 


0M(,HU)6 


I7666i^ 




MOV 


»6,0ADCS 


51 :' 


I'il 35 4' 


"16777 


0.M130 


176656 




MOV 


TaBApA,flADMP 


511 


001 36 2' 


i'l2777 


0(-U')U(.>4 


176644 




MOV 


M,»Ancs 


512 


i1 1 170' 


HI 2777 


177777 


176642 




MOV 


8-1 ^ORDMR 


51 3 


0/1 376' 


(M2777 


0MM(H*^ 


1766 30 




FOV 


«2#flAncs 


514 


vic-M 404' 


(M6777 


0(11(^5 4 


176626 




^OV 


MYEAjfiAHMR 


515 


0014 12' 


M 00 406 








HR 


LPAO 


516 


001414* 


!M2777 


0.M 16 4' 


176622 


TSHpAr"! 


MOV 


8SMPAD,(aADINT 


51 J 


iH'1422' 


H52777 


e>"«Hl00 


176604 




HIS 


«BIT6»PADCS 


518 


(-',1. 14 30' 


116777 


17635h 


1 76610 


LPADJ 


MOVR 


BRl,(iADlNTl 


519 


iii'-14 36' 


(^0506 7 


.-■•1 136 






CLP 


CHOUT 


52J 


(< '1 44 2' 


tu..5.'>6 7 


VI r^ 1-24 






CLP 


AORB 


521 


(^'1 4 46' 


i>127b7 


V'1'2527' 


^'H1020 




MOV 


SAUTBLA.TBPTH 


522 


in>1454' 


0v^5277 


1 7^55 1 






IfviC 


PADCS 


523 
















524 


14 6 0' 


lv^4400 


6)'"MH'vi» 






FXirs, 


, BEGIN 


525 

















iTEST BTT 15 

JRPANCH IF TEST SIMPLE A TO 

J SET up NpR AD VECTOR 

iLOAD CA POINTER 

iLOAD CA REGISTER 

jLOAD WC POINTER 

J LOAD WC REGISTER 

jLOAD STATUS POINTER 

jLOAP FXT, STATUS HEGISTfcR 

iStT Up SIMPLE AD VECTOR 
jENABLE INTERRUPT 



fCLFAR BUFFER POP'TER 
jLOAD TABLE POIMTFK 
jSTART A TO D 

IFXIT TO MONITOR, MODULE WATI FOR IMrFKPUPT, 



000000* 001472* 



176374 



000756 
176360 
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526 
S27 
528 
529 
§30 
331 
S32 
533 
534 
53S 
S36 
337 
S38 
S39 
S40 
541 
542 
543 
541 
545 
546 
547 
549 
549 
550 
5S1 
552 
553 
554 
5SS 
556 
557 
558 
559 
5(j«> 
561 
5b2 
563 
5b4 
565 
566 
5t)7 
569 
56'0 
570 
571 
572 
573 
574 
575 
576 



MACylt 30a{10523 i2«0CT»78 I6i50 PRGE IS 



001464* 

001464* 000004 

001472* 005777 
001476* 100020 
001S00' 017767 
001506* 005077 
001SS2* 017767 . 
001520* 012767 

001526* 104406 

001534* 104410 

001540* 017777 
001S46* 026767 
001554* 001031 
001556* 005767 
001362* 001011 
fr01S64* ^12767 
001S72? 012767 
001600* 005067 
001604* 000422 

001606* 004767 
001612* 012767 
001620* 005067 
001624* 005067 
001630* 005367 
001634* 001006 
001636* 000417 



ISIMPLE 
SMFADI 



001640* 
001646* 



062767 

005267 



001652* U6777 

001660* 112777 

001666* 105277 

001672* 104400 

001676* 00S077 
001702* 

001702* 104413 

001706* 000167 



176536 

176530 
176522 
176520 
000025 

000000* 
000000* 

176472 
176456 



0027^4^ 
177777 

000674 



000366 

002522* 

000654 

000642 

000634 



000002 
000626 

000622 
000100 
176342 
000000* 

176332 

000000' 

176352 



000726 
000724 



000702 
000672 



176362 
176346 



A TO TEST 



PiBQgfBEGiNf 1$ 



8 QUEUE UP TO CONTImUE hi 18 AND RTI 



TST 

BPL 
MOV 

MOV 
MOV 



§IDCS 

SMPADl 

iAOCSrACSR 

fADCS 

fADDBR?ADTiMP 

g2S,ERRTyP 



I TEST A TO P STATUS 



I LOAD VALUE 
fCLEAR STATUS 



fDAfA LATE 

SOFERS, BEGIN, NULL | A TO D STATUS ERROR 
END$iBEGlN - I 



SMP/^Dl! 



9ADDBR»§TBPTR IREAD THE DATA INTO A BUFFER 



&D2I 

AD3I 



DONEI 
TIMESI 



MOV 
CMP 

BNE 
TST 
BNE 

MOV 
MOV 
CLB 
BR 

JSR 
MOV 
CLR 
CLR 
DEC 
BNE 
BR 

ADD 
INC 

MOvB 
MOVB 
IPiCB 
EXITS, BEGIN 

CLB iADCS 

EMDITS, BEGIN 

JMp PESTRT 



ENDtH,CH0UT 

AD2 

AORB 

ADl 

«ADTB!jB,TBPTR 

#«1,A0R8 

CHOUT 

AD3 

PCf ADCK 

»ADTBLA,TBPTR 

CHOUT 

AORB 

ADPAS 

AD3 

DONE 

#2»TbPTR 
CHOUT 

CHOuT,PADCSHB 

SBIT6,0AOCS 

iADCS 



ITEST FOR LAST CHANNEL 
iBBANCH IF NOT 
I TEST BUFFER 

jENn OF A, RESET TO B 



iTEST THE DATA 

I RESET TO A BUFFER 

ICLEAR STARTING CHANNEL 

fFINISHED A PASS ? 

fNO 

fFINISHFD A PASS 

jUP 0ATF THE POINTER 
»UPDATE THE CHANNEL 

ILOAD CHANNEL INTO HIGH BYTE 



lEXIT TO MONITOR. MODULE WAIT FOR INTERRUPT, 

ICLEAR STATUS/CONTROL 

fSIGNAL END OF ITERATION, 
iMONITOR SHALL TEST END OF PASS 
jGO BACK AND DO IT AGAIN 
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577 
















578 










iNPP a 


TO D TEST 


579 
















580 


001712* 








NPBADI 






5til 












1 »«»««««««»«»««.»«»««.«"' 


582 


001712* 


000004 


000000* 


001720* 




PiROSi 


,BEGIN,1S 


5*^3 












I »»««,„«»»»=»«.«»»«««««. 


5^4 


0^1720* 


005777 


176310 




1$« 


TST 


#ADCS 


5H5 


001724* 


100025 








BPL 


NPRADA 


5B6 


001726* 


017767 


176302 


176146 




MOV 


§ADCSiACSR 


5h7 


001734* 


012777 


000002 


176272 




MOV 


S2#aADCS 


588 


001742* 


005077 


176272 






CLR 


iADMS 


589 


001746* 


005077 


176262 






CLR 


iADCS 


590 


001752* 


017767 


176260 


000516 




MOV 


iADnBR,ADTEMp 


591 


001760* 


012767 


000002 


176120 




MOV 


#2#ERRTYP 


592 












1 »»»»«»4*««*4*»«»##9«««^ 


593 


001766* 


104406 


000000* 


000000 




SOFEPS, BEGIN, NULL 


594 












J ««»»«»»»»»«««««<»»»«4H 


595 
596 
597 


001774* 


104410 


000000* 






ENDS, BEGIN 


002000* 


017767 


176232 


000470 


npradai 


MOV 


iADDBRf ADTEMP 


598 


002006* 


026767 


176216 


000464 




CMP 


ENOCH, CHOUT 


599 


002014* 


001017 








BNE 


NPRAD3 


600 


002016* 


005767 


000450 






TST 


. AORB 


601 


002022* 


001041 








BNE 


NPRAD2 


002 


002024* 


012777 


000006 


176202 




MOV 


#6,«>ADCS 


b03 


002032* 


016777 


000460 


176200 




MOV 


TABBPA,9ADMR 


b04 


002040* 


012767 


177777 


000424 




MOV 


#"1,A0RB 


605 


002046* 


005067 


000426 






CLR 


CHOUT 


O06 


002052* 


000402 








BR 


NPRADl 


607 


002054* 


005267 


000420 




NPHAD3I 


INC 


CHOUT 


608 


002060* 


012777 


000004 


'J6146 


NPRADl 1 


MOV 


S4,3ADCS 


bd'i 


002066* 


012777 


177777 


176144 




MOV 


#«1,PADMR 


6 10 


002074' 


012777 


000002 


176132 




MOV 


»2#iaADCS 


hti 


002102* 


016777 


000356 


176130 




MOV 


MYEA,9ADMR 


612 


002110' 


116777 


000 36 4 


176124 




MOvB 


CHOUT, fADCSHB 


613 


002116* 


105277 


176112 






INCB 


iADCS 


614 


002122* 


104400 


000000* 






EXITS, 


,BEGIN 


6|S 
616 


F02126* 


112777 


000002 


176100 


NPBaD2S 


MOVB 


#2#PADCS 


6 17 


002134* 


005077 


176100 






CLP 


9ADMB 


6t« 


002140* 


004767 


000034 






JSR 


PCAOCK 


619 


002144* 


005367 


000320 




,, 


DEC 


ADPAS 


620 


002150* 


001652 








BEQ 


DONE- 


621 


002152* 


012777 


000006 


176054 




MOV 


S6f9ADCS 


022 


002160* 


016777 


000324 


176052 




MOV 


TABAPA,iADMR 


623 


002166* 


005067 


000300 






CLR 


AORB 


624 


0112172* 


005067 


000302 






CLR 


CHOUT 


625 


frit' 2 176* 


000730 








BR 


NPRADl 



I QUEUE UP TO CONTINUE AT IS AND RTI 
I TEST FOR ERROR 
iLOAD VALUE 

jCLEAR STSTUA 



iDATA LATE 

INPB A TO D STATUS ERROR 



««»»•»#«»•»*» 



JREAD BUFFER 

iTEST FOR LAST CHANNEL 

IBBANCH IF NOT 

fTEST FOR A OP B BUFFER 

JBRANCH IF B 

iLOAD Ca POINTER 

iLOAD CURRENT ADDRESS 

ICLEAR CHANNEL 

lUPOATE CHANNEL 

iLOAD WORD COUNT POINTER 

iLOAD WORD COUNT 

iLOAD DMA STATUS 

fLOAD E6 BITS AND DMA ENABLE 

iLOAD CHANNEL INJO THE HIGH BYTE 

fEXIT TO MONITOR, MODULE WAIT FOp INtFHRUPI. 



fCHECK THE CONVERTED VALUE 

fFINISHED A PASS ? 

I YES 

iLOAD CA POINTER . 

iLOAD CA 

>SET POINTER TO A BUFFER 

ICLEAR CHANNEL 

iBRANCH TO START AT CH 
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620 
627 


«02200* 


005367 


000262 




APCKI 


UEC 


WHYCT 


IDECBEMFNT COUNTEP 


628 


002204* 


001401 








BEQ 


IS 


IBBANCH IF DONE 


629 


002206' 


000207 








PTS 


PC 


lEXIT 


630 


002210' 


016767 


176016 


000250 


181 


MOV 


WHYCNTfWHYCT 


fRELOAD COUNTER 


631 


002216' 


012767 


002522' 


000256 




MOV 


»ADTBLA,P01NTA 


iLOAD POINTER TO TABLE A 


632 


002224' 


012767 


002724* 


000252 




MOV 


#ADTBLB, POINTS 


ILOAD POINTEP TO TABLE B 


633 


0^2232' 


005067 


000140 






CLP 


CHOUTA 




634 


002236' 


017767 


00024*?i 


000232 


ADLOOPI 


MOV 


gPOlNTA.ADTEMP 


ISAVE DAfA 


635 


002244* 


167767 


000234 


000224 




SUB 


§P0INTB#ADTEMP 


iSUBfRACT SECOND FROM THE flRST 


636 


002252' 


001413 








BCQ 


ADLOPA 


fBB IF EQUAL 


637 


002254* 


100005 








BPL 


ADLOPB 


|BP IF PLUS 


639 


002256* 


066767 


175744 


000212 




ADD 


WIDCAOTEMP 


iCHECK rOR A»B<«W1DE 


639 


002264* 


100006 








BPL 


ADLOPA 


IBR IF OK . 


640 


002266* 


000422 








BP 


DATBAD 


IBR IF ERROR 


641 


002270* 


166767 


175732 


000200 


ADLOPBI 


SUB 


WIDE,ADTEMP 


fCHECK FOR k»B>**ilDE 


642 


002276* 


003401 








BLE 


ADLOPA 


IBR IF OK 


643 


002300' 


000415 








BR 


DATBAD 


|BR IF ERROR 


644 


002302' 


026767 


000070 


175720 


ADLOPAl 


CMp 


CHOUTA, ENOCH 


iTEST FOR LOAS CHANNEL 


64S 


00^310' 


0014J3 








BEO 


LOADLS 


IBRANCH IF LAST 


646 


002312* 


005267 


000060 






INC 


CHOUTA 


fPOINTEP TO CURRENT CHANNEL IF SIMPLE A TO D 


647 
















|WORD POINTER IF NPR A TO D 


649 


002316' 


062767 


000002 


000156 




ADD 


#2,P0INTA 


fMOVE POINTER 


649 


002324' 


062767 


000002 


000152 




ADD 


»2#P01NTB 


fMOVE POINTER 


650 
651 


002332* 


000741 








BR 


ADLOOP 


iTEST MORE CHANNELS 


652 
653 


002334' 


016767 


000142 


175540 


DATBADI 


MOV 


POINTA»SBADR 


ILOAD "GOOD" ADDRESS 


654 


002342' 


017767 


000134 


175536 




MOV 


pPOINTAfASB 


iLOAD "GOOD" DATA 


655 


002350' 


016767 


000130 


175526 




MOV 


POINTS, WASADB 


iLOAD «BAD« ADDRESS 


656 


002356' 


017767 


000122 


175524 




MOV 


3P0INTB,AWAS 


iLOAD "BAD" DATA 


657 


002364* 


005077 


175644 






CLP 


?ADCS 




659 












f»#»»«»#»*«»»»«««»«»«»»»»»»»»*»»«»«»«»«»«»«»«»«»«»«»li«»»««»»»««« 


659 


002370* 


104404 


000000* 






DATER$, 


,BEGIN 


fDATA EPROPlll 


660 












1 »»»»«»»«»»»«»»««»»»»««»»»»»»»«#»»«»»#»»»»»»»»»»»«»»«»»«»««»«««» 


661 
662 
663 


002374* 


000742 








BP 


ADLOPA 




002376* 


000000 






CHOUTAI 







IBAD CHANNEL 
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664 
















665 
















666 


002400* 


016767 


000052 


000052 


LOADLSI 


MOV 


TEMPI, TEMP2 


667 


002406* 


012767 


000006 


000046 




MOV 


#6,TEMP3 


668 


002414* 


016777 


«00040 


175614 


281 


MOV 


TEMP2,SAD0BI 


669 


002422* 


105267 


000033 






INCB 


TFMP2*1 


670 


002426* 


005367 


000030 






DEC 


TEMP3 


671 


002432' 


001370 








BNE 


2S 


672 


002 4 34* 


005267 


000016 






INC 


TFMPi 


673 


002440' 


022767 


0001^40 


000010 




CMp 


»40, TEMPI 


674 


002446' 


001002 








BWE 


38 


675 


002450' 


005067 


0e<0002 






CLP 


TEMP! 


676 


002454* 


000207 






3SI 


PTS 


PC 


67 7 


002456* 


'50 000 






TEMPI 1 







678 


002460* 


000001'' 






TEMP2I 







679 


002462* 


000000 






TEMP3I 







680 
















681 


002464* 


010000 






MYEAI 


10000 




682 


002466* 


000001 






WHYCTI 


1 




683 


002470' 


J100000 






ADPASi 







684 


002472* 


M00000 






AORBI 







685 


002474' 


002522* 






TPPTPI 


ADTBLA 




686 


002476* 


000000 






ADTFMPs 







687 


002500* 


000000 






CHOUll 







688 


002502* 


000000 






POIMTAl 







689 


002504* 


000000 






POINTBI 







690 


002506* 


000000 






TABAI 







69J 


002510* 


000000 






TABAPAl 







692 


0f'2512* 


000000 






TABAEAl 







f>93 


002514* 


0/J0000 






TABBI 







694 


002516* 


000000 






TABBPAl 







695 


002520* 


1^00000 






TABBEAl 







696 


002522' 


000000 






ADTBLAi 







697 




002724* 




. 




*s.*200 




698 


002724* 


000000 






ADTBLBl 


0- 




699 




003126* 








.a.*200 




700 




000001 








sF^n 





lEA IN 14»13 DMA ENABLE IN 12 



STABLE A 

itable R 
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ACSP 


000102P 


aocK 


002200B 


^DCS 


000214P 


ADCSHB 


000242P 


ADDBR 


000236P 


ADDB 


000006P 


aDDR22s 


001000 


ADINT 


000244B 


ADINTl 


000246P 


ADLOOP 


002236P 


ADLOPA 


002302P 


ADLOPB 


002270P 


ADMP 


000240P 


ADPAS 


002470B 


ADPASS 


000224P 


ADTBLA 


002522R 


ADTBLB 


002724P 


ADTEMP 


002476P 


ADI 


001606P 


AD2 


001640B 


AD3 


001652P 


AOBB 


002472P 


ASB 


000106P 


ASTAT 


000!04P 


AWAS 


000ii0P 


BEGIN 


000000P 


BIT0 a 


000001 


ilTI » 


000002 


BIT10 a 


002000 


BITU 8 


004000 


BII12 ? 


0iuak?e 


BIT13 a 


020000 


BITH P 


040000 


BIT15 s 


100000 


BIT2 « 


000004 


8IT3 K 


000010 


BIT4 s 


000020 


BITS s 


000040 


BIT6 s 


000100 


8IT7 8 


000200 


BITS 8 


000400 


BIT9 s 


001000 


SPEAKS^ 


104407 


iBi 


000012B 


BB2 


00CT013B 


BTODS s 


104421 


CDATA$s 


104412 


CHOUT 


002500B 


CHOUTA 


002376B 



llSii 




CBOSa BI 


:febence 


TABLE «• 


USEB SI 


rMBOLS 












SEO 001 


2628 


383« 


426« 


455» 


492» 


537# 


586» 














556 


618 


627# 






















326« 


343» 


3S3 


368» 


369 


312^ 


374 


377» 


379 


383 


384 


385* 


399* 


400« 


428« 


438« 


439« 


465* 


466« 


482» 


483* 


485 


489* 


494* 


505* 


509* 


111* 


513<» 


517» 


S22» 


535 


537 


538» 


568» 


• 569* 


572* 


584 


586 


587* 


589# 


602« 


608«. 


610« 


613# 


616» 


6214* 


657» 












33H 


348» 


349« 


561 » 


612« 


















327# 


344* 


34S» 


539 


546 


990 


597 


668« 












228# 


343 


344 


346 


348 


















312# 


























335» 


350* 


508» 


516» 




















336» 


3S1» 


352». 


5184* 




















634# 


6S0 
























636 


639 


642 


644# 


661 


















637 


641# 
























329# 


346» 


347* 


401 


403« 


405 


408» 


410 


413* 


415 


418* 


430 


423* 


426 


427» 


440« 


442 


445« 


447 


450« 


452 


458 


467* 


469 


472* 


474 


477* 


479 


484« 


4884» 


492 


493* 


S10« 


512* 


514* 


588* 


603* 


609* 


6}|* 


617» 


622» 
























354# 


560» 


619® 


683# 




















318# 


354 
























355 


321 


557 


631 


683 


696« 
















356 


551 


632 


698# 




















539» 


590» 


597» 


634« 


635» 


638# 


64l» 


6861 












550 


556» 
























548 


564S 
























554 


561 


567# 






















520® 


549 


552« 


559# 


600 


604» 


623» 


6849 












266# 


654» 
























264# 


373» 


378« 


404» 


409« 


414» 


419» 


441* 


446* 


451* 


468* 


473* 


478* 


2673 


656» 
























225# 


357 


358 


388 


390 


431 


433 


458 


460 


497 


499 


524 


533 


542 


544 


570 


574 


582 


593 


595 


614 


659 










312# 


315# 
























il2n 


315« 
























3l2i 


315» 
























312# 


315« 
























3!2» 


3158 


363 


472 


473 


474 


484 














312S 


3158 


477 


478 


479 


















312# 


315« 


472 


473 


474 


















3128 


315# 
























312# 


315i 
























312# 


315» 
























312# 


3158 
























3128 


315# 
























312# 


31S# 


517 


568 




















312» 


315» 
























312# 


315» 
























312# 


315» 
























312# 


























230# 


518 
























231S 


























312« 


























3I2« 


























5t9» 


547 


553» 


558# 


S6S» 


567 


598 


605» 


607* 


612 


624* 


687# 




633* 


644 


646® 


663# 
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CONfiG 


000056R 


250# 
















CSRA 


000100P 


260# 


353* 


384* 


401* 










DATBAD 


002334P 


640 


643 


653# 












DATCKSa 


104411 


312# 
















DATERIs 


104404 


312S 


659 














DONE 


001676B 


562 


572# 


620 












OVIDl 


000014P 


232# 
















ENDCH 


000230B 


32l« 


547 


598 


644 










ENDITSa 


104413 


3128 


574 














ENDS s 


104410 


312« 


390 


433 


460 


499 


544 


595 




EPBTYP 


000106R 


265# 


386* 


429* 


456* 


495* 


340* 


591* 




EXITS s 


104400 


312« 


524 


570 


614 










GETPASa 


104415 


3t2» 


357 


358 












GWBUF$a 


104414 


312« 
















HPDCNT 


000044P 


245# 
















HBDER88 


104405 


312# 


388 


431 


458 


497 








HPDPA5 


000050R 


247# 
















ICONT 


000036R 


242# 
















ICOUNT 


000040B 


2438 
















IDNUM 


00<^122B 


272S 
















INIT 


000030B 


239# 
















INTB 


000120P 


271# 


341* 














LOADLS 


002400P 


645 


666# 














LPAD 


0kil430P 


515 


518# 














MAP22Sas 


!(<^4416 


312# 
















MODNAM 


000000R 


2268 
















MODSP 


000224P 


240 


310« 














MSGN$ s 


U'4403 


312# 
















MSGS$ s 


104402 


312« 
















MSG$ s 


104401 


312« 
















MYEA 


002464R 


364* 


514 


611 


681# 










NPHAD 


001712P 


508 


580» 














NPRADA 


002000P 


585 


S97» 














NPRADl 


0t'2060B 


606 


608S 


625 












NPBAD2 


002126P 


b<M 


bi6» 














NPBA03 


002054B 


599 


607# 














NULL a 


000000 


312# 


388 


431 


458 


497 


542 


593 




OPEN m 


0000^0 


227 


233 


234 


235 


236 


253 


254 


255 






262 


264 


266 


267 


269 


270 


271 


312t 


OTOAS ^ 


104420 


312« 
















PASCNT 


000034B 


241# 
















PIBOI a 


000004 


312« 


533 


582 












POINTA 


002502P 


631* 


634 


648* 


653 


634 


688» 






POINTB 


002504B 


632* 


635 


649* 


655 


656 


689# 






POPSP 9 


00S726 


3123 
















P0PSP2S 


022626 


312# 
















PPIME 


001 326B 


395 


490 


505# 












PRINTS 


000572P 


381 


393» 










♦ 




PPTY 8 


000000 


231 


, 312S 














PBTY0 s 


000000 


312# 
















PRTYl 8 


000040 


3}2# 
















PBTY2 s 


000100 


312# 
















PBTY3 m 


000140 


3l2t 














• 


PPTY4 9 


000200 


3I2S 
















PRTYS « 


000240 


3!2i 
















PPTYfe f 


000300 


230 


312i 















259 
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PRTY7 i 


1 000340 


312» 








PS a 


i 177776 


312# 








PSW g 


1 177776 


312# 








PUSH ^ 


1 003746 


312» 








PUSH2 Si! 


> 024646 


3124 








RANDS « 


1 104417 


312# 








RAHNUM 


0000S4R 


249# 








RESTRT 


000264R 


268 


343# 


576 




RESl 


000096R 


25U 








RES2 


000060R 


2528 








RSTRT 


000112R 


268# 








SBADR 


000102R 


261# 


653« 






JSMPftD 


001464R 


516 


S31« 






SMPADl 


001540R 


536 


!r46# 






SOrCNT 


000042R 


244S 








S0rER$«9 


104406 


312« 


542 


593 




90FPAS 


000046R 


246» 








5P0INT 


000032R 


240# 








3PSXZ 9 


000040 


18 


273 






SRI 


000016R 


233» 


393 


506 




SR2 


000020R 


234» 








SR3 


000022R 


235i 








3R4 


000024P 


236S 








START 


000290R 


239 


3401 






STAT 


000026R 


238# 








SVR0 


000062R 


2538 








SVRl 


000064R 


254# 








SVB2 


000066R 


255# 








SVR3 


000070R 


256« 








SVR4 


000072R 


257# 








SVR5 


000074R 


258# 








SVR6 


000076R 


259» 








SYSCNT 


000052R 


248« 








TABA 


002506B 


355« 


357 


6901 




TABAEA 


002S12R 


359 


692» 






TABAPA 


002910R 


510 


622 


691« 




TAB8 


002514R 


356« 


358 


693# 




TABBEA 


002520R 


695« 








TABBPA 


002516R 


603 


694S 






TBPTR 


002474R 


521« 


546« 


55l» 557» 564« 


TEMPI 


002456R 


666 


672» 


673 67S» 677# 


TEMP2 


002460l» 


666* 


668 


669« 6788 


TEMP3 


002462R 


667» 


670» 


679» 




TESTAD 


000446P 


368« 








TIMES 


001702R 


573» 








TRPDFDs 


000022 


312« 








TSMPAD 


001414R 


507 


516S 






ISTCAP 


000604R 


394 


399» 






TSTEX-T 


001124R 


453 


465« 






TSTWCP 


000776R 


424 


438# 






VECTOR 


0000I0R 


229# 


350 


351 




iiJASADR 


000104R 


263» 


655* 






WDFR 


000116R 


2708 








WDTO 


000114P 


26911 


340# 






WHYCNT 


000232R 


322« 


630 






WHYCT 


002466R 


627* 


630« 


662 # 


__._^ , ,. ._. 
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SEQ 0021 



HIDE 000226R 
XFLAG 000005R 
9 a 003126R 



320» 
227» 
6978 
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